home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-20 / fdlog102.zip / MODELIST.PRG < prev    next >
Text File  |  1991-04-02  |  326b  |  16 lines
  1. SET TALK OFF
  2. USE LOGGER INDEX SEQUENCE, CALL
  3. STORE "      " TO mod
  4. SET TALK ON
  5. @ 0, 0 CLEAR TO 24, 79
  6. @ 10, 15
  7. ACCEPT "ENTER MODE DESIRED: (CW, USB, ETC.) " TO mod
  8. SET TALK OFF
  9. ? CHR(15)
  10. SET PRINT OFF
  11. REPORT FORM MODELIST FOR mode=mod TO PRINT NOCONSOLE
  12. SET PRINT ON
  13. ? CHR(27)+CHR(64)
  14. SET PRINT OFF
  15. DO RPTMENU
  16.